home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Utilities / Programming / EnterAct 3.5 / Drag_on Modules / hAWK programs / $BoilerPlate < prev    next >
Encoding:
Text File  |  1994-08-19  |  591 b   |  22 lines  |  [TEXT/KAHL]

  1. # $BoilerPlate : issue std top comment for a source file
  2. # No input, set variables putInComment, file, author before
  3. # -no harm done if don't.
  4.  
  5. BEGIN {
  6.     
  7.     if (putInComment+0)
  8.         print "/****"
  9.     print "\tFile.....:\t", file
  10.     print "\tDate.....:\t", TIME
  11.     match(TIME, /[0-9][0-9][0-9][0-9]/);
  12.     print "\t.........:   ©", substr(TIME, RSTART, RLENGTH) ,"Delrina (Canada) Corporation. All rights reserved."
  13.     print "\tYell at..:\t", author
  14.     print "\tStatus...:\t under development"
  15.     print "\tSee also.:\t "
  16.     print "\tSpec.....:\t "
  17.     print "\tRevisions:\t "
  18.     
  19.     if (putInComment+0)
  20.         print "****/"
  21.     }
  22.